prolog './g031.ijs'
NB. _. ------------------------------------------------------------------

0 $ 0 : 0
_. = _.
0 = _. = _
0 = _. = __

'_.' -: ": _.
'_.' -: ": _  + __
'_.' -: ": __ + _
'_.' -: ": _  - _
'_.' -: ": __ - __
'_.' -: ": _  % _
'_.' -: ": _  % __
'_.' -: ": __ % _
'_.' -: ": __ % __

_. -: _.
0  -: _. -: _
0  -: _. -: __
)

8 -: (3!:0) _.

'NaN error' -: ex '_. ". ''circ'''


NB. conversion of _0 to 0 in place --------------------------------------

x=: 20$_.
1 [ x i.!.0 ]1 2 3 4
(3!:1 x) -: 3!:1 ($x)$_.






epilog''

